home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 March / CHIP Mart 1997.iso / SurfCam / SURFCAM.Z / K&T600.M4 < prev    next >
Encoding:
Text File  |  1996-04-01  |  4.6 KB  |  162 lines
  1. name K&T MM600 D-17 4 Axis
  2.  
  3. % 00
  4. o >8
  5. / 00
  6. N >8
  7. G >2
  8. X ->4.>4
  9. Y ->4.>4
  10. Z ->4.>4
  11. B ->3.>3 Limit -359.999 359.999
  12. I ->4.>4
  13. J ->4.>4
  14. K ->4.>4
  15. E ->4.>4
  16. R ->4.>4
  17. P >3
  18. F >3.>1
  19. H >2
  20. D >3
  21. M >2
  22. T >2
  23. S >4
  24. ( 00
  25. e >3.>4
  26. ) 00
  27.  
  28. ModalLetters B X Y Z R F              # List of letters that are modal    
  29.  
  30. ModalGs 0 1 2 3 73 74 76 80 81 82 83 84 85  # List of g codes that are modal    
  31.  
  32. Sequence#s N 1 5 5                    # Char, freq, incr & start          
  33. First#? N                             # Y or N  'Output 1st sequence no.  
  34. Last#? N                              # Y or N  'Output last sequence no. 
  35.  
  36. HCode X                               # X or X U  'Horizontal char.       
  37. VCode Y                               # Y or Y V  'Vertical char.         
  38. Dcode Z                               # Depth char.                       
  39. FeedCode F                            # Feed rate char.                   
  40.  
  41. Comment ( )                           # Begin End comment char.           
  42.  
  43. Spindle 3 4 5                         # Cw, ccw & stop m codes            
  44. Coolant 8 9 7                         # On, Off & Mist m codes            
  45. DComp 41 42 40                        # Left, Right & Cancel m codes      
  46. LComp 43 49                           # On & Off codes                    
  47.  
  48. Feed G1                               # Linear move                       
  49. Rapid G0 F0                           # Rapid positioning word             
  50. Cw G2                                 # Circular move clockwise           
  51. Ccw G3                                # Circular move counter clockwise   
  52.  
  53. Inc/Abs G 91 90                       # Inc & Abs char. & values          
  54.  
  55. CtrCode I J                           # I J or R or I J K L               
  56. Helical? N
  57.  
  58. Spaces? Y                             # Y or N  'Spaces between words     
  59.  
  60. Incremental? N                        # Y or N  'Inc or abs output        
  61. CtrIncremental? Y                     # Y or N  'Inc or abs I & J         
  62. ByQuadrants? Y                        # Y or N  'Break arcs at quadrants  
  63.  
  64. Inch/MM 70 71                         # Inch & Metric g codes             
  65.  
  66. UppercaseComments? Y                  # Y or N 'Require uppercase comments
  67.  
  68. WorkDefault 1                         # Work offset register default      
  69.  
  70. Drill                                 # Drilling canned/manual cycle      
  71. G81 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  72. end cancel
  73.  
  74. Peck                                  # Pecking canned/manual cycle       
  75. G87 X[H] Y[V] Z[D] E[VBite] R[Vclear] F[FRate]
  76. end cancel
  77.  
  78. Tap                                   # Tapping canned/manual cycle       
  79. G84 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  80. end cancel
  81.  
  82. LTap                                  # Left handed tapping cycle         
  83. G83 X[H] Y[V] Z[D] E[VBite] R[Vclear] F[FRate]
  84. end cancel
  85.  
  86. Ream                                  # Reaming canned/manual cycle       
  87. G85 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  88. end cancel
  89.  
  90. Bore                                  # Boring canned/manual cycle        
  91. G86 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  92. end cancel
  93.  
  94. Back                                  # Back boring canned/manual cycle   
  95. G88 X[H] Y[V] Z[D] R[Vclear] F[FRate]
  96. end cancel
  97.  
  98. Cancel                                # Cancel a canned/manual cycle      
  99. G80
  100. end
  101.  
  102. Index Y                               # Index the rotary table            
  103. G0 Z20.0 M25
  104. B[Rotangle]
  105. Z[Rplane] M[Cool]
  106. End
  107.  
  108. UnWind                                # Unwind the rotary table           
  109. G0 Z20.0 M25
  110. B0
  111. G0 X[LastH] Y[LastV] B[LastRotAng]
  112. G1 Z[LastD]
  113. End
  114.  
  115. StartCode                             # Start of the program              
  116. %0
  117. o[Program#] )0
  118. G[Unitmode] G90 G80 G40 G17 M26
  119. G94
  120. End
  121.  
  122. 1stToolChange                         # First tool change                 
  123. T[Tool]
  124. M6 (0 e[ToolDiam] )0
  125. M[Direct] S[Speed]
  126. T[NextTool]
  127. G0 X[H] Y[V] B[RotAngle] F0 H[Work]
  128. Z[D] F0 P[Lcomp] M[Cool]
  129. M[Cool]
  130. End
  131.  
  132. Infeed                                # Enable cutter comp                
  133. G[Side] X[H] Y[V] D[DComp] F[FRate]
  134. end
  135.  
  136. Outfeed                               # Disable cutter comp               
  137. G1 G40 X[H] Y[V]
  138. end
  139.  
  140. ToolChange                            # Secondary tool changes            
  141. G90 G0 Z20.0 F0 M19 M25 P0
  142. M6 (0 e[ToolDiam] )0
  143. M[Direct] S[Speed]
  144. T[NextTool]
  145. G0 X[H] Y[V] B[RotAngle] F0 H[Work]
  146. Z[D] F0 P[Lcomp] M[Cool]
  147. End
  148.  
  149. EndCode                               # End of the program                
  150. G0 G90 Z20.0 F0 M5 P0
  151. B0
  152. M02
  153. %0
  154. End
  155.  
  156. RapidCode                             # Rapid move                        
  157. G0 X[H] Y[V] Z[D] F0
  158. End
  159.  
  160. Replace "o" with "(NAM, "
  161. replace "e" with "ToolD: "
  162.